home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
QRZ! Ham Radio 8
/
QRZ Ham Radio Callsign Database - Volume 8.iso
/
mac
/
files
/
t_sys5
/
bm_cpio.gz
/
unixbm.cpio
/
unix.c
< prev
next >
Wrap
C/C++ Source or Header
|
1994-07-11
|
3KB
|
159 lines
/* This file contains machine specific functions */
#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/termio.h>
#include <signal.h>
#include <string.h>
#include "bm.h"
#include "ndir.h"
struct termio savetty;
int savedtty = 0; /* tell weather savetty is valid */
/* This function should put the tty in a mode such that signgle characters
* can be read without waiting for a complete line. Echo should be on.
*/
setrawmode()
{
struct termio ttybuf;
ioctl(0, TCGETA, &ttybuf);
ioctl(0, TCGETA, &savetty);
savedtty = 1;
ttybuf.c_lflag &= ~ICANON;
ttybuf.c_iflag &= ~ICRNL;
ttybuf.c_oflag &= ~OCRNL;
ttybuf.c_cc[VTIME] = '\0';
ttybuf.c_cc[VMIN] = '\1';
ioctl(0, TCSETA, &ttybuf);
}
/* This function should restore the tty modes back to cooked mode */
setcookedmode()
{
if (savedtty) {
ioctl(0, TCSETA, &savetty);
savedtty = 0;
}
}
/* This function return one charater form the keyboard. It will wait
* for a character to be input. This function will echo the character.
* This funtion will return afer each character is typed if raw is set
*/
int
getrch()
{
int c;
c = getchar();
return c & 0xff;
}
/* This function show clear screen and put cursor at top of screen */
screen_clear()
{
}
setsignals()
{
/* ignore break */
signal(SIGINT,SIG_IGN);
}
/* wildcard filename lookup */
filedir(name, times, ret_str)
char *name;
int times;
char *ret_str;
{
static char dname[128], fname[128];
static DIR *dirp = NULL;
struct direct *dp;
struct stat sbuf;
char *cp, temp[128];
/*
* Make sure that the NULL is there in case we don't find anything
*/
ret_str[0] = '\0';
if (times == 0) {
/* default a null name to *.* */
if (name == NULL || *name == '\0')
name = "*.*";
/* split path into directory and filename */
if ((cp = strrchr(name, '/')) == NULL) {
strcpy(dname, ".");
strcpy(fname, name);
} else {
strcpy(dname, name);
dname[cp - name] = '\0';
strcpy(fname, cp + 1);
/* root directory */
if (dname[0] == '\0')
strcpy(dname, "/");
/* trailing '/' */
if (fname[0] == '\0')
strcpy(fname, "*.*");
}
/* close directory left over from another call */
if (dirp != NULL)
closedir(dirp);
/* open directory */
if ((dirp = opendir(dname)) == NULL) {
printf("Could not open DIR (%s)\n", dname);
return;
}
} else {
/* for people who don't check return values */
if (dirp == NULL)
return;
}
/* scan directory */
while ((dp = readdir(dirp)) != NULL) {
/* test for name match */
if (wildmat(dp->d_name, fname)) {
/* test for regular file */
sprintf(temp, "%s/%s", dname, dp->d_name);
if (stat(temp, &sbuf) < 0)
continue;
if ((sbuf.st_mode & S_IFMT) != S_IFREG)
continue;
strcpy(ret_str, dp->d_name);
break;
}
}
/* close directory if we hit the end */
if (dp == NULL) {
closedir(dirp);
dirp = NULL;
}
}
/*
** strcmpic: string compare, ignore case
*/
stricmp(s1, s2)
char *s1, *s2;
{
register char *u = s1;
register char *p = s2;
while(*p != '\0') {
/* chars match or only case different */
if(tolower(*u) == tolower(*p)) {
p++; /* examine next char */
u++;
} else {
break; /* no match - stop comparison */
}
}
return(tolower(*u) - tolower(*p)); /* return "difference" */
}